data4Excel <- eval(parse(text=(load("RDATA_FILE"))[1])); write.table(data4Excel, file="TMP_FILE", row.names=F, sep=",")


